home *** CD-ROM | disk | FTP | other *** search
/ Mac Mania 4 / MacMania 4.toast / / Tools&Utilities / NLphoneCheck 2.0 / NLphoneCheck2.0 / Voor⁄for later / JJLcheckDataAddV2N (.txt) < prev    next >
FileMaker Pro Database  |  1995-11-13  |  14KB  |  135 lines
  1. HBAM2001MAY84
  2. JJLcheckDataAddV1.0N:*
  3. 2780300
  4. Pro 1.0F!
  5. Pro 1.0I
  6. Main Dictionary
  7. User Dictionary
  8. 13-11-1995
  9. COMMENT
  10. A8278 & If(Length(E1) = 3 ,0 & Left(E1,2),Left(E1,3)) & 0 
  11. AreaB
  12. @@#1B
  13. TextToNum(Area) & Left(Abo ,1)
  14. @@#2B
  15. Nieuw
  16. Nieuw
  17. CompleteB
  18. YesfD
  19. YesfD
  20.     Helvetica
  21. ea) and TextToNum(Middle(@#4,4 ,3)) 
  22.  TextToNum (Area),                      "Area code does not exist yet, are you sure?",                                                        If(TextToNum(Left (Abo,1)) 
  23. or TextToNum(Left (Abo,1)) 
  24.  8 ,    "Subscriber numbers cannot begin with 0, 1, 8, or 9",                                                                                                       If (@#2 
  25.  0 ,"Entr
  26. ckData and import"))))
  27. 2780300C
  28. 030D    555 55 55E
  29. 2780300HLOK, valid data. To add, open JJLcheckData and import the two matching fieldsI
  30. 2780300
  31. NieuwB
  32. YesfD
  33. YesfD
  34. n the new / nieuw  field bel
  35. Pro 1.0F!
  36. Pro 2.0 - 2.1I
  37. Main Dictionary
  38. User Dictionary
  39.                                                                 If (@#2 
  40.  0 ,"",278 & If(Length(E1) = 3 ,0 & Left(E1,2),Left(E1,3)) & 0 ))))
  41. Kengetal
  42. Abonnee nummer
  43. Commentaar
  44. JJLcheckData
  45. CommentB
  46. If(Length(TextToNum(Area)) + Length(TextToNum(Abo)) 
  47.  9 ,  "Length of valid new numbers must be ten digits",                                                         If(TextToNum(Middle(@#3,4 ,3)) 
  48.  TextToNum(Ar@@#4B
  49. JJLcheckData
  50. JJLcheckDataK
  51. If(Length(TextToNum(Area)) + Length(TextToNum(Abo)) 
  52.  9 ,"",                                                         If (TextToNum (Middle (@#3,4 ,3)) 
  53.  TextToNum (Area) and TextToNum (Middle (@#4,4 ,3)) 
  54.  Text
  55. "",                                                                                                       If (@@#2 
  56.  0 ,"",@@#1)))
  57. JJLonlyB
  58. Users
  59. YesfD
  60.     Helvetica
  61. Chicago
  62. Monaco
  63. Geneva
  64. 2780300
  65. 2683130
  66. y already exists, do not import!",                      "OK, valid data. To add, open JJLcheckData and import the two matching fields"))))
  67.     '.Length of valid new numbers must be ten digits&
  68. '+Area code does not exist yet, are you sure?
  69. ToNum (Area),@#1,                                                        If(Left(Abo,1) 
  70.  1 or Left(Abo,1) 
  71.  8 ,"",                                                                                               C
  72.         If (@#2 
  73.  0 ,"",@#1))))
  74. (@#2 
  75.  0 ,"Ent
  76. Als de PTT in de toekomst nieuwe series abonneenummers uitgeeft (B.v. 030-5xx xx xx) kan je de serie aan de gegevens in JJLcheckData toevoegen door het netnummer en  
  77. n nieuw abonr in te tikken.
  78. De benodigde gB
  79. egevens worden dan uitgerekend en kunnen vervolgens in de file JJLcheckData geimporteerd worden. (Met Importeer uit het Archief menu, zoek passende velden).
  80. JJLcheckData
  81.  not exist yet, are you sure?&
  82. '#Abo cannot begin with 0, 1, 8, or 9&
  83.     '#Entry alrBLeady exists, do not import'-OK, valid data, go to JJLcheckData and import
  84. @@#4B
  85. JJLcheckData
  86. If(Length(TextToNum(Area)) + Length(TextToNum(Abo)) 
  87.  9 ,"",                                                         If (TextToNum (Middle (@#3,3 ,3)) 
  88.  TextToNum (Area) and TextToNum (Middle (@#4,3 ,3)) 
  89.  TextB
  90. ToNum (Area),278 & If(Length(E1) = 3 ,0 & Left(E1,2),Left(E1,3)) & 0 ,                                                        If (Left (Abo,1) 
  91.  1 or Left (Abo,1) 
  92.  8 ,"",                                       
  93. AreaB
  94. TextToNum(Area) & Left(Abo ,1)
  95. JJLcheckData
  96. AreaB
  97. @@#1B
  98. TextToNum(Area) & Left(Abo ,1)
  99. @@#2B
  100. '2Subscriber numbers cannot begin with 0, 1, 8, or 9&
  101.     '$Entry already exists, do not import!'LOK, valid data. To add, open JJLcheckData and import the two matching fields
  102. '#Abo cannot begin with 0, 1, 8, or 9&
  103.     '#Entry already exists, do not import'EOK, valid data, go to JJLcheckData and import the two matching fields
  104. K, valid data, go to JJLcheckData and import the two matching fields
  105.                                                  C
  106.         If (@#2 
  107.  0 ,"",@#1))))
  108. JLcheD.ckData and import the two matching fields"))))
  109. 2780300
  110. 3780100
  111. 3780100
  112. 2780300
  113. 3780100
  114. 3780100
  115. Pro 1.0F!
  116. Pro 1.0I
  117. Main Dictionary
  118. User Dictionary
  119. Fields
  120. Import
  121. Jjlcheckdata
  122. Matching
  123. Valid
  124. Pro 1.0F!
  125. Pro 1.0I
  126. Main Dictionary
  127. User Dictionary
  128. 2780300
  129. 307D    777 77 77E
  130. 2780300I
  131. 2683130
  132. alid data. To add, open JJLcheckData and import the two matching fieldsI
  133. 2780300
  134. User Dictionary
  135.